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NAM PDS-SYS2N 

OPT O.NOG 

PDS SYSTEM 2N CASSETTE DRIVERS (SYS2NF) 
PROGRAMMED BY ERIC JAMESON 



COPYRIGHT 1976 SPHERE CORPORATION 

940 N. 466 Eft. .; NORTH SALT LAKE.. UTAH 84654 



P. 0. BOX 213j 



BOUNTIFUL. UTAH 8 



SPHERE RESERVES ALL RIGHTS FOR THE REPRODUCTION.. 
DISTRIBUTION AND USE OF THE PDS SOFTNARE. 
NO COPIES MAY BE MADE OR DISTRIBUTED NITHOUT THE 
NRITTEN PERMISSION OF SPHERE CORP. 



THE PROGRAM DEVELOPMENT SYSTEM (PDS SYS2N> IS A SET OF 
PROGRAMS RESIDING ON ERASABLE PROGRAMMABLE READ ONLY 
MEMORY NHICH ALLON EVEN THE SMALLEST USER TO USE HIS 
SPHERE SYSTEM AS A COMPLETE COMPUTER SYSTEM FOR THE 
DEVELOPMENT OF COMPUTER PROGRAMS. 

TONARD THIS END.. THE 5 PDS EPROMS CONTAIN A CURSOR 
BASED EDITOR.. A MINI -ASSEMBLER.. AND THE SPHERE DEBUGGING 



AID <SDA>, AS HELL AS A SET OF UTILITY ROUTINES 
BIT MUL TIPL Y AND D I VI DE, ASC II- TO-B I NAR V, AND 
BINARY-TO-ASCII ROUTINES.. AND ROUTINES TO DO 
INPUT AND OUTPUT TO THE AUDIO CASSETTE. 



TO DO 16 



THE SYS2N SOFTNARE IS AN UPGRADE OF THE PDS V3R 
(V3N & V3D> SOFTNARE DESIGNED TO RUN NITH THE CASSETTE 
SYSTEM. THERE ARE TNO VERSIONS OF THE SYS2 SOFTNARE: 
SS'S2N NHICH RUNS NITH THE NEN KEYBOARD AND THE SVS2A 
NHICH RUNS NITH THE ORIG I ON AL (KBD/1A) KEYBOARD. THE 
MAIN DIFFERENCE 8ETNEEN THE V3R AND SYS2 VERSIONS ARE 
THAT A FIFTH EPRQM HAS BEEN ADDED AND THAT THE MINI- 
ASSEMBLER HAS BEEN DELEATED AND REPLACED NITH A SET Of 
COMMANDS TO DO LOADING AND DUMPING OF CASSETTE TAPES. 



The SYS2NF prom is a version of the SYS2N cassette prom with a 
software bog fixed. This bug would cause the next block of a 
multibloek read to be skipped if the checksum on the proceeding 
block was a 16 and the tape had not been previously used. The 
change is on page ]0 where the ESC test and branch now branches 
to RDHDR1 instead of RDHDR. 
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16 BIT RCC. PSEUDO REG B. 
.HI BYTE OF RRB. 
-L0 BYTE OF RRB. 
16 BIT RRITH PSEUDO REG R. 
.HI BYTE OF RRR. 
-L0 BYTE OF RRR. 
BYTE USED BY RSCBIN FOR TMP. 
CRSSETTE 1-0 STATUS BYTE. 
END OF OUTPUT BUFFER TEXT. 
STRRT OF I/O BUFFER (PTR) 
PTR. TO END OF I/O BUFFR. 
STRRT OF OUTPUT BUFFER. 
PHYSICRL CRSSETTE NUMBR. <=r " 
SOURCE FOR TEXT MOVES. 
DEST. RDDR. FOR TEXT MOVE. 
LRST RDDRES OF RERL MEMORY. 
PTR TO CURSER ON SCREEN. 
TEMP PTR USED BY OUTSTR. 
PTR TO END OF LOW EDIT TXT. 
PTR TO STRRT OF HI TEXT. 
PTR. TO BUFFRD TXT STRRT. 
PTR TO RSSMBLR SOURCE CODE. 
HRS RSSMBLR OPERND VALUE. 
VRLUE PUT IN RSSM. SYMTBL. 
TEMP SRVE FOR BRKPT DRTR. 
RDDDRESS OF BREAKPOINT. 
8 IF EDITOR IS NOT RUNNING. 
CRSSETTE SLOCK NRME. 
1-0 BUFFER FOR DEBUGGER. 
SYS2N CRSSETTE RCIR RDDR. 
CRSSETTE NRME PRINT FLRG. 
CRSSETTE BLOCK TYPE CODE. ' 
RDDR. OF 1-0 BUFF. FOR CRSS. ' 
LENGTH OF CRSS. BUFFER. , 
PROGRRM COUNTER FOR RSSM./^-^< 
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FOLLOWING RRE VRRIRBLE VRLUES. 
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TIMER COUNTER. 

RCIR VRLUE TO TURN ON CRSS. 

RCIR VRLUE TO STOP CRSS.s 

END-QF-TEXT. 

SYNCHRONISE. 

END-OF-TRANSMISSION-BLOCK. 

EXCRPE TO NONSTANDARD HDR. 

SET FOR TRRILER ERROR. ; 

SET FOR CHECKSUM ERR. ! 

TIME CNTR FOR 1/4 SEC. 

TIMES FOR 2 & 1/4 SECONDS. 
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PDS SYSTEM 2N CASSETTE DRIVERS 
ORG $FB60 

CASSETTE 1-0 DRIVERS 

THE CASSETTE DRIVERS LORD AND DUMP A BLOCK OF DATA 
TO AND FROM THE CASSETTE. THEY HANDLE BOTH THE HEADER 
AND TRAILER FORMATTING. 

THE DRIVERS ARE SET UP AR A SET OF SUBROUTINES 
CALLED BY THE EXECUTIVE OR THE USERS PROGRAMS. 



LON MEMORY ADDRESSES USED BY THE DRIVERS ARE: 



CSTATS 
BLKNAM 
ACIANO 
NOPRNT 
BFRPTR 
BFRSZE 



AT 
AT 
AT 
AT 
AT 
AT 



09 

38 
3A 
3C 

3E 



USED TO STORE INPUT ERR CODE.* 
2 CHAR. NAME OF BLOCK. 
PTR. TO THE AC I A CURRENTLY USED. 
PRINT FLAG FOR BLOCK NAME. 
START OF CASSETTE 1-0 BUFFER. 
END OF CASSETTE DATA BUFFER. 



THE DRIVERS CAN BE RUN FROM THE PDSSYS2N SOFTWARE 
SYSTEM, MHICH CONTAIN THE CASSETTE LOAD AND DUMP 
COMMANDS IN THE EXEC, OR FROM THE PDS-V3A, HHERE THE 
DRIVERS ARE CALLED THROUGH THE DEBUGGER. 

THE DRIVERS DISPLAY PERTINENT DATA ON THE SCREEN 
MHEN WRITING OR READING FROM THE CASSETTES. ON A HRITE, 
THE CHARACTERS BEING HRITTEN ONTO THE CASSETTE ARE 
DISPLAYED IN THE SECOND CHARACTER POSITION FROM THE 
UPPER RIGHT HAND CORNER OF THE SCREEN. ON A READ.. THE 
CHARACTERS BEING READ IN ARE DISPLAYED IN THE UPPER 
RIGHT HAND CORNER OF THE SCREEN. THE NAME OF THE BLOCK 
CURRENTLY BEING READ OR SEARCHED OVER IS DISPLAYED ON THE 
RIGHT HAND SIDE OF THE SECOND LINE. THE ERROR CODE FOR 
A READ IS DISPLAYED ON THE RIGHT SIDE OF THE THIRD LINE. 
NO CHANGE IN CHARACTER MEANS THAT THE READ HAS 0. K. 
A "C" MEANS THERE HAS A CHECKSUM ERROR ON THE BLOCK. 
A "T" MEANS THAT THE NRONG NUMBER OF BYTES HERE READ 
INTO THE BUFFER (TRAILER ERROR). THIS MOULD OF COURSE 
IMPLY A CHECKSUM ERROR ALONG NITH THE TRAILER ERROR. 

THE CSTATS (CASSETTE STATUS> BYTE MILL CONTAIN A 6 
IF THE BLOCK READ IN MAS 0. K. IF IT HAS A BAD READ, IT 
HILL CONTAIN A 54 FOR TRAILER ERRROR OR A 43 FOR A 
CHECKSUM ERROR CODE UPON EXIT FROM THE ROUTINE. 

SETTING THE NOPRNT (NO PRINTING) FLAG TO A 6 MILL 
STOP THE DISPLAY OF CHARACTERS ON THE SCREEN DURING 
CASSETTE READ AND HRITE, EXCEPT FOR THE T £ C ERROR 
CODES, HHICH ARE ALMAYS DISPLAYED MHEN THEY OCCUR. 
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IF THE FIRST BYTE OF BLKNAM (BLOCK NAME) IS A 
WHEW THE REM BLOCK ROUTINE IS ENTERED.. THE NEXT BLOCK 
HILL BE READ FROM TFIPE NO MATTER HHAT THE NAME OF THE 
TAPE BLOCK IS. ON THE SYS2N EXEC, A CONTROL SPACE 
CHARACTER CAN BE TYPED IN AS THE FIRST CHARACTER OF THE 
NAME IN THE LOAD BLOCK COMMAND. THUS.- A (CNTL LXCNTL 
SPACE) (X) HOULD READ IN THE NEXT BLOCK ON THE TAPE. 



THE TAPE FORMAT IS 
SYN IU 
SYN t , 
SYN I it 
ESC I 8 
HI BYTE 



Sot-S 



S7 



OF 16 BIT 
LOW BYTE OF BLOCK 
FIRST CHAR OF BLOCK 
SECOND CHARACTER OF 
DATA 



DATA 

ETB ft 

CHECKSUM 

CHECKSUM 

CHECKSUM 

CHECKSUM 



BLOCK LENGTH 
LENGTH 

NAME 

NAME 



) 






THE CHECKSUM IS CALCULATED FROM THE DATA.. HHICH 
IS READ IN FROM THE CASSETTE BUFFER RESIDING IN MEMORY. 



THE FORMAT FOR THE CASSETTE BUFFER IS: 



fBFRPTR 

cIrIsIsIe 



BFRSZE^ 



I 



T 



T 



B U 



FER 



WHEW DATA IS READ IN.. THE READ ROUTINE SETS 'BFRSZE' 
TO POINT TO THE LAST CHARACTER READ INTO THE BUFFER. 
NOTE THAT THERE IS NO OVERFLOW CHECK WHEW DATA lb READ 
INTO MEMORY. ON OUTPUT TO THE CASSETTE.. THE BLOCK 
LENGTH IS CALCULATED FROM THE BFRPTR AND BFRSZE POINTERS. 



THE READ BLOCK AND URITE BLOCK ROUTINES AUTOMATICALLY 
TURN ON AND OFF THE CASSETTE. 
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THE ADDRESSES OF THE ROUTINES FOR CONTROLLING 
THE CASSETTE FIRE R5 FOLLOHS: 



INTLZ 

URTBLK 

RDBLK 

MRTMOD 

RDMOD 

CAS OUT 

CRSIN 

TURNON 

TRNOFF 



FBd8 
FB2D 
FB91 
FB2F 
FB93 
FB62 
FB7E 
FB7? 
FBB0 



INITIALIZES THE ACIA FOR USE. 

NRITES R FORMATTED BLOCK TO CASSETTE 

RERDS IN R FORMATTED BLOCK OF TRPE 

NRITES R BLOCK TO A RUNNING CRSSETTE 

READS A BLOCK FROM A RUNNING TRPE. 

NRITES OUT ONTO TRPE THE BVTE IN A. 

RERDS IN A BVTE INTO ACCUM. A 

TURNS ON THE CRSSETTE DRIVE. 

TURNS OFF THE CASSETTE DRIVE IIHEN THE 

POINTR TO ACIA IS PRSSED IN THE X REG. 



NOTE THAT ALL THE ABOVE ROUTINES RRE SUBROUTINES THAT 
ARE ENTERED BY A JSR OR BSR CALL 



USING THE CASSETTE DRIVERS. 



IF THE EPROMS ON THE CPU 
THE DRIVERS ARE 



BOARD ARE THE SVS2N OR THE 
SYS2D PROMS.. JHE DRIVERS ARE USED BY THE I (INITIALIZE).. 
L (LOAD FROM CASSETTE) AND S (STORE ONTO CASSETTE) 
COMMANDS THRT ARE A PRRT OF THE SVS-2 EXECUTIVE. 



IF THE CPU PROMS BEING USED ARE THE PDS-V3R OR THE 
PDS-V3N OR V3D PROM SETS.. THEN THE USER MUST SET UP THE 
POINTERS AND CRLL THE ROUTINES HIMSELF, USING THE 
DEBUGGER ON THE CPU PROMS. (NOTE THAT THE V3A AND V3N 
DEBUGGERS VARY.. FOR INSTRNCE THE V3R GO COMMAND IS A 'Q' 
NHILE THE V3N GO COMMAND IS R "CNTL 0"'. REFER TO THE 
USERS MANUAL FOR DETRILES. ) 

THE FIRST THING TO DO IS OPEN THE LOW MEMORY L0CRTI0NS 
USED BY THE DRIVERS RS FLAGS AND POINTERS AND INITIALIZE 
THE LOCATIONS. THE ACIANO, BLKN AM, BFRPTR AND BFRSZE 
SHOULD WOW BE GIVEN VALUES. 

ACIANO MOULD POINT TO F858 FOR THE FIRST CASSETTE AND 
TO F868 FOR THE SECOND CASSETTE DRIVE. 

A SIMPLE PROGRAM TO CRLL THE ROUTINES SHOULD NON BE 
NRITTEN. OPEN LOCATION 988. TYPE IN THROUGH THE DEBUGGER 
THE INSTRUCTIONS JSR BDXX, JMP FE4F. XX IS THE SECOND BYTE 
OF THE DESIRED DRIVER ROUTINE, I.E. 88 FOR INITIALLIZATION 
OR 91 FOR READING A BLOCK OR 2D FOR NRITING A BLOCK. THUS.. 
TO INITIALIZE RN ACIA, ACIANO WOULD BE LOADED NITH 
THE ADDRESS OF THE ACIA AND THE USER MOULD THEN JUMP TO THE 
ROUTINE AT 980 BY OPENING 988 AND JUMPING TO IT NITH 
THE '•£'' COMMAND. THE ROUTINE MOULD BE AS FOLLONS: 



ALL 900 
981 
902 
983 
904 
985 



BD TSR 

FB HI BYTE OF ROUTINE AADDRESS 

00 LOW BYTE OF DRIVER ADDRESS. 

7E JMP 

FE ADDRESS OF THE DEBUGGER ON 

4F THE PDS V3A PROM SET 



ie 
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00272 * THE ACIA MOULD NON BE INITIALIZED AND CONTROL MOULD 

00273 * HAVE RETURNED TO THE DEBUGGER. TO READ IN A BLOCK, 

00274 * THE NAME MOULD BE PUT IN BLKNAM AND LOCATION 992 MOULD 

00275 * BE CHANGED 70 91. THE USER MOULD THEN JUMP TO 999. 

88^76 * 

#0277 * TO TEST THE CASSETTE.. SET BFRPTR TO E969 FIND BFRSZE 

00278 * Til E9DF. THIS MILL ALLOM THE USER TO MRITE OUT DATA 

08279 * FROM WE FOURTH, FIFTH.. SIXTH RND SEVENTH LINE OF THE 

00289 * CRT DISPLAY FIND THEN READ IT BACK ONTO THE DISPLAY. DATA 

00281 * CAN BE TYPED ONTO THE SCREEN BY OPENING A LOCATION MITH 

09282 * THE DEBUGGER AND THEN MOVING THE CURSOR AROUND THE SCREEN 

0Q283 * TO CHANGE THE CHARACTERS. THIS IS POSSIBLE BECAUSE THE 

00284 * ROUTINE TO INPUT AN ADDRESS CALLS THE ED I TOR TOR INPUT. 

68285 * 

09286 * THE DRIVER ROUTINES CAN ALSO BE USED TO PERFORM 

00287 * 1-0 MITH A MODEM OR TELETYPE. THE MAIN HARDMARE 

00288 * DIFFERENCE BETMEEN THE CASSETTE AND MQDEM/TTV IS THAT THE 

00289 * CASSETTE HAS A DIVIDE BY 16 CLOCK AND IS UNIDIRECTIONAL 

00290 * MHILE THE MODEM/TTY HAVE H DIVIDE BY 64 CLOCK AND CAN BE 
00-791 * BIDIRECTIONAL. BECAUSE OF THE CLOCK CHANGE THE ACIA MUST 
00292 * BE TURNED ON MITH A DIFFERENT VALUE BEFORE THE READ BLOCK 
00*93 . * OP MRITE BLOCK ROUTINES ARE ENTERED. TO TURN ON THE ACIA 
B0294 * STORE THE VALUE 'B2 y INTO LOCATION F95B OR F96Q. ONCE 
0A295 B2will produce * IT IS TURNED ON.. EITHER CAS IN OR CASOUT MAY BE CALLED 
90296 a siqnel of eight * REPEATEDLY OR MRITE MODEM BLOCK (MRTMOD) OR READ MODEM 
99297 data bits and 2 * <Rt>MOD> CAN BE CALLED ONCE. MRTMOD & RDMOD ARE THE SANL 
9B29S l,r If * AS MRTBLK 4 RDBLK EXCEPT THEY DO NOT TURN ON THE ACIA. A 
,-^299 stop bits. It ;f: PR0GRmi jo READ IN A BLOCK OF DATA FROM A MODEM OR TTY 
00700 the iTY operates* muL£f THU5 BE (PLACED BEFORE THE 'CALL' ROUTINE): 

• 0010-1 on a different * g. ffi £>£ ?ff LDX ACIANO LOADS ACIA POINTIER. 

0070? code, look up * 8FC 86 B2 LDA A #$B2 LOADS STARTUP VALUE. 

90303 the proper init- * 8FE A7 99 STA A 9, X PUTS START CODE INTO ACIA. 

99294 ialization value * LOCATION 962 MOULD NON BE 2F FOR MRITING AND 93 TO READ 

003*5 n the ACIA * TO READ IN A CHARACTER FROM THE TELETYPE TURN ON THE 

09396 , M t: n of the * flCI * mD G0 T0 THE FOLLOWING ROUTINE: 

90367 ,. • ?. * TTYIN JSR CASIN READS IN A CHAR FROM KEYBOARD. 

0070S ch.p descr.pt.on :f J|1/p C ASOUT TYPES OUT CHAR ON PRINTER. 

09399 appendex. * TH£ RS2 32 SHOULD HAVE BEEN STRAPPED TO HALF DUPLEX. 

09319 * i 

99311 * 

90712 * IT IS TO BE STRESSED THAT THE RELIABILITY OF THE 

09313 * CASSETTE CONTROLLER DEPENDS ON THE ADJUSTMENT OF THE 

99314 * TRIMMER ON THE SIM BOARD. IF THE TRIMMER IS OUT OF 

00315 * ADJUSTMENT THE DATA MILL NOT READ IN PROPERLY. BESIDES 

00316 * USING THE OSCILLOSCOPE TO ADJUST J HE TRIMMER, IT CRN ALSO 

00317 * BE ADJUSTED BY READING IN A STRING OF SINGLE CHARACTERS 

00318 * FROM THE CASSETTE AND ADJUSTING IT UNTIL THE CHARACTERS- 

00319 * SYNC IN PROPERLY. THE BEST CHARACTER TO USE IS A STRING 

00320 * OF 'U'S. TO READ IN THE STRING FOR TESTING USE.. MRITE A 

00321 * LOOP TO GET A CHARACTER FROM THE CASSETTE AND THEN 
0032? * DISPLAY THAT CHARACTER. A SAMPLE ROUTINE TO DO THIS IS: 
003?3 * A JSR ZFB7E LOADS A MITH CASSETTE CHAR. 

00324 * JSR $PCRD PDS-V3A PUTCHR ROUTINE. 

0Q725 * TST $F991 TESTS KEYBOARD FOR A KEY. 

00?o$ * .. BPL A SKIPS BACK IF NO INPUT. 

00327 * THE ABOVE ROUTINE MOULD INPUT CHRRACCTERS UNTIL A KEY 

90328 * ON THE KEYBOARD MAS DEPRESSED. 

9 
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PDS-SYS2 



0M&31 



08333 
66334 

09335 
00336 
6033? 
09338 



FB80 
FB82 

FB94 
FB06 
FB6S 
FBOR 



DE 38 
86 13 
R7 06 

86 51- 
R? 6d 
39 \ 



if) 



INTLZ 



INTLZ INITIALIZES THE RCIR CONTROLLER 
8 SPECIFIC TAPE UNIT RT MOUNT TINE. 



FOR 



LDX 

LDR R 
SIR 8 
SDR] 8 
ST8*n~ 
RTS " 



RCIRNO 

P$13 

WFF 
3/ X 



X GETS 
RESETS 



8CI8 ADDRESS. 
THE RCIR. 



xtsn-t 



SETS 8CIR TO 

/IS 2 STOFS BIT F0RN8T. 



u>m — **&* 

JtxmuLB 






ftQA 



■J/IAJ 



dPP 



60340 

k3t"<i-HJL 

09342 
093-43 
89344 
B0345 
68346 
0034? 
00348 
60349 
88358 
86351 
88352 
68353 
88354 
00355 
£(■&? 
68s5? 
08358 
88359 

86361 

88362 

88363 
08364 
88365 
68366 
8836? 
88368 
88369 
88378 
88371 
88372 
88373 
88374 
88375 
88376 
68377 
88378 
88379 
88388 

oWb'2 
88383 
88384 






14RTHDR F0RN8TS THE HERDER ON THE T8PE. 



FB8B 
FB8D 
FB8F 
FB11 

FB13 
FBI 5 
FBI? 
FB19 
FB1B 
FB1D 
FB1F 
FB21 






FB24 
FS26 
FB28 

FB2FI 
FB2C 3. 



86 
80 
8D 
8D 
86 
8D 
96 
D6 
D8 
92 
8D 
17 
ID 
96 
8D 
96 
8D 



FB3i 

t B34 
FB35 
FB37 
FB38 

FB3R 
FB3C 

FB3E 
FB48 



FB 



H2 



F843 
FB45 
F847 
FB49 

FB4B 
FB4D 



16 
53 
51 
4F 
IB 
4B 
3E 
3F 
3D 
3C 
41 

3E 

38 

•j- 4 
56" 



FB2D 8D 48 
FB2F 



C6 89 
CE 5161 
89 

26 FD 
58 
26 F? 

80 CF 
8D 18 

86 1? 
80 28 

sb ID 

8D IB 
80 19 
8D 1? 

8D 63 

39 



8 



MRTHDR LD8 

BSR 

fBSR 

IBSR_ 

LD8 8 

J3SR 

\ LD8 

LD8 

SUB 

SBC 

BSR 

TB8 

■■ . BSR 

LD8 

BSR 

LD8 

■- BSR 

K RTS 



r 1 



8 



8 



#SYN 

CASour. 

~C8S0LIT 

cnsouT_] 

fESC 
CRSOUT 

BFR^ZE 

BFRSZE+1 

BFRPTR+1 

BFRPTR 

CRSOUT 

CRSOUT 
BLKNRM 

CRSOUT 
BLKNRN+1 

CRSOUT 



PUTS SYNC CHRRS ONTO TRPL 



? 



oJ 



FOLLOWING OUTPUTS LENGTH. 
LORDS LO BYTE OF END PTR. 
SUBS LO BYTE OF BEGIN PTR. 
SUBS HI BYTE OF START PTR. 
OUTPUTS HI LENGTH BYTE. 
LORDS LO BYTE OF LENGTH. 
OUTPUTS LOW LENGTH BYTE. 
PUTS OUT NAME OF BLOCK. 



PUTS OUT L8ST OF NAME. 
RETURNS BRCK TO MRTBLK. 



liQA cA-iO^r 



MRTBLK MRITES OUT R BLOCK OF DRTR 



MRTBLK BSR TURN ON TURNS 

* FOLLONING MRITES FOR 

MRTMOD 



TO 



THE CRSSETTf. 



TIME1 

TIME2 



•■* 



* 

NRTVLR 



LDR i 

LDX 

DEK 

BNE 

DEC £ 

BNE 

THE 
BSR 
BSR 



XTIMCNT 

tiTWE 

TIME2 

TIN El 
TIME LOOP 
HRTHDR 
MRTBFR 



LORDS 
MRSTER 



ON THE CASSETTE. 
CASSETTE TO GET UP 
TIME LOOP COUNTER. 
TIME LOOP (1/4 SEC 

COUNTS CYCLES OF LOOP. 

TESTS FOR FIRST TIME OUT. 

COUNTS TIMES IN LOOP. 

SKIPS BRCK UNTIL DONE. 
IS NOW FINISHED. 

MRITES HERDER ON THE TRPE. 

MRITES OUT BUFFER DRTR. 



TO 



i™ n *"• *■"* /*• 



FOLLONING MRITES THE TRAILER OUT ONTO THE TRPE. 



* 



LDR 
BSR 
TBR 



\ BbR 
\ BSR 

Ibsr 

BSR 

END 



H 



#ETB 

CRSOUT 



CRSOUT 
CRSOUT 

CRSOUT 
CRSOUT <i 
OF TRRILER 

TRNOFF 



RTS 



OUTPUTS END-OF-BLQCK CHRP. 
ET8 IS DISPLAYED RS R "W". 
A GETS CHECKSUM FROM B. 
OUTPUTS THE CHECKSUM. 
OUTPUTS TRRILER FILLER 
BYTES. 

MRITING ROUTINE. 

HALTS CRSSETTE DRIVE.? seA twoi* 



(-A 



PRGE 088 PDS-SYS2 



00387 






* 


URTBFR 


NRITES 


0038S 






* 


BUFFER 


ONTO n 


00389 






*• 








00390 






* 






• 


00391 


FB4E 5F 




URTBFR 


CLR 


B 


- 


00392 


FB4F DE 


3C 




LDX 




BFRPTR 


00393 


FB51 R6 


00 


NBFR1 


fi>R 


R 


0.. X 


00394 


FB53 OF 


00 




'Istx 




TtIP ' 


00395 


FB55 3D 


0B 




u£ R 




CRSOUT 


09396 


FB57 IB 






TWa 




:..'■ 


60397 


FB58 16 




y 


\TRB 






00398 


FB59 DE 


99 




Wx 




TMP 


00399 


FB5B 9C 


IF 


f 


~&>x 




BFRSZE 


90400 


FB5D 2? 


17. 


I 


BEQ 




CSOEXT 


00401 


FB5F 08 




1™ 


INX 






09402 


FB60 26 


EF 




BNE 




NBFR1 



OUT THE CONTENTS 
IE CASSETTE TRPE. 



OF THE 



INIT CHECKSUM COUNT. 

fiCIFl CONTROL MASK. 

LORDS CHRR. FROM BUFFER. 

SRVES BUFFER PTR. 

PUTS CHRR ONTO CRSSETTE. 

R GETS R+B. 

B GETS R+B. 

RESTORES PTR. INTO BUFFR. 

TESTS IF BUFFER EMPTY. 

EXITS NHEN EMPTY. 

INC POINTER. 

SKIPS BRCK IF CHRRS. LEFT. 



09404 








td 


CRSOUT 


TAKES 


00495 








& 


ONTO THE Cfi:?S t 


09486 














cv£7r 


90497 








•'# OVS *l- 


hSO- 




<AStJt 


98488 


FB62 


36 




CRS8UT 


PSH 


R 


, 


90489 


FB63 


DE 


38 




LDX 




RCIRNO 


88418 


FB65 


86 


82 




LDR 


R 


#2 


88411 


FB67 


R5 


80 


CRS01 


BIT 


R 


8.. X 


88412 


FB69 


C I 


FC 




BEQ 




CRS01 


88413 


FB68 


32 






PUL 


R 




88414 


F&6U 


R7 


81 




STR 


R 


1..X 


88415 


FB6E 


70 


883R 




TST 




NOPRNT 


89416 


FB71 


£> 1 


83 




BEQ 




CSOEXT 


8841 7 


r 5 1 •:• 


Of 


E81E 




STR 


R 


$E8 IE 


88418 


FB76 






CSOEXT 


RTS 







THE CHRR IN R 
r£ TRPE. 



RND PUTS IT OUT 



SRVES CHRR T8 RERD OUT. 
X GETS PHYSICRL RCIR RDDR. 
LORDS CONTROL TEST BITS. 
TESTS IF RCIR BUFFER EMPTY. 
LOOPS BRCK UNTIL RERDY. 
GETS 8RIG CHRR. 
STOPS CHRR INTO RCIR BUFFER. 
TESTS IF PRINTOUT RLLONED. 
SKIPS PRINTING IF R 8. 
DISPLRVS CHRR ON SCREEN. . 



08428 

88421 

88422 

88 

88424 FB79 S6 Bl 

884 

884 



?*:*> rtf c DE u-o 



25 FB78 R7 

26 FB7D 39 



* 



TURNON TURNS ON THE CRSSETTE DRIVE. 



TURNON LDX RCIRNO LORDS CRSSETTE RCIR RDDRESS. 

LDR R #0N 

TURNS RCIR ON. ^ 





STR R 


8> X 




RTS 




~\V<lNOH 


Lbfrfl 


* Oti 




Qtfr 




■ \jtLtJdtr 


t-6/V/l 


* or<r 


» ,' 


MA- 


~$et** ,t " 


/I 

40 'AST 


C.O.X.. 






srAft- 




QXt 





PftGE 889 PDS-SYS2 



60429 

88438 
6M31 

amis 

813434 
60435 
8Q436 



•J- I 



8Q441 



FB7E DE 
FBS0 86 

FBS4 
FS86 
FBSS 
FB86 
FB8D 
FB96 



R5 

.-j— > 

C, I 

ft 6 
70 

B7 



60 
FC 

ei 

663ft 

63 

E61F 



* 



CftSIN REftDS IN ft 'CHARACTER FROM THE 
INTO THE ft ACCUMULATOR. 



CASSETTE TAPE 



CftSIN LDX 



CftSINl 



ftCIftNO 



',..' 



CINEXT 



LDft 


ft 


#1 


LOftDS^ 


BIT 


ft 


0, X 


TESTS 


BEQ 




CftSINl 


SKIPS 


LDft 


ft 


i, X 


LOADS 


TST 




NOPRNT 


TESTS 


BEQ 




CI NEXT 


SKIPS 


STft 


ft 


$E01F 


DISPL 


RTS 






. 



GETS THE ftCIft ftDDRESS. 
TEST BITS. 

IF ftCCIft BUFFR FULL. 
BftCK IF NOT IN VET. 
IN CHAR FROM TAPE. 
IF PRINT IS OFF. 
DISPLAYING IF 0. 
YS CHR ON TV. 



66443 
66444 

001445 
60446 
60447 



49 
66456 

#-? 

60454 
06455 
80456 
6845? 
88458 
08459 
68468 
08461 
88462 
88463 
68464 
80465 
00466 
08467 
08468 



FB91 
FB95 

FB97.. 

FB98'^ 

FB9ft 

FB9C 

FBft6 
FBA2 
FBA4 
FBft6 
FBA7 
FBft9 
FBAB 
EBRD 



FBB8 

FBB4 



8L> 

"80 
80 

W 
80 
81 

•77 

&. i 

86 
28 
80 
11 

0"7 

«-- ! 

86 
97 

B7 



E4 

28 
55 



86 
A 7 
79 



51 
08 



* 
* 

ROBLK 
RDMOD 

ROTLR 



89 

1 1 

84 

54 

87 

08 

07 
43 
09 



RTLR1 



RTLR2 






ROBLK READS IN ft BLOCK FROM THE CftSSE\ 
TAPE INTO BUFFER MEMORY. 



*> 



BSR 
BSR 

BSR 



TURNON 



TURNS 
REftDS 
ROBFR REftDS 



RDHDR 



FOLLOWING READS 
CLR ft - 
STft ft CSTftTS 
BSR CftSIN 

CMP ft #£TB 
BEQ RTLR1 

LDft ft #ERR4 
BR ft RTLR2 

BSR CftSIN 

CBft 
BEQ ■ 
LDft ft 
STft ft 
STft ft 



TRNOFF 
#ERR5 
CSTftTS 
f£85F< 
END OF TRftlLER READ 
FOLLOWING TURNS OFF 
TRNOFF LDft A WFF " 
f^STA A 0., X 
1 RTS 



ON TAPE DRIVE. 
IN THE HEADER. 
IN DATPl INTO SUFFER. 
IN TRAILER AND CHECKS CHECKSUM. 
?£>S A O FOR A GOOD READ. 
SETS STATUS BYTE TO NO ERR. 
I NPU TS END-QF-BL OCK CHAR. 
ETB DISPLAYS AS A "N". 
SKIPS IF NO ETB ERROR. 
LORDS TRftlLER ERROR CODE. 
SKIPS TO STORE ERROR CODE. 
READS IN CHECKSUM. 
TESTS CHECKSUM. 
SKIPS IF OK. 

SETS CHECKSUM ERROR CODE. 
SETS ERROR STftTUS BYTE. 
>DISP. ERR CODE ON SCREEN. 
IN. 



THE CASSETTE DP. I 



Kl v 



'C 



LOADS COMMAND TO TURN 
OFF ftCIft CASSETTE DRIVE. 



tfriq ptAJ fP-f 7 



.5X AdMO- 



y RGE die PC'S~SVS2 



60471 
804 72 
60473 
66474 
B0475 FBB5 80 C7 

66477 FBB9 26 Ffi 
6647S FBBB SD CI 
0647$ HEED SI IB 
F6 



* 

RDHOR 
RDHDR1 



ROHDR 

FIGUR, 



FINDS THE STRRT 6F THE BLOCK ON THE TAPE, 
EfS THE BUFFER END RND CHECKS THE NAME. 



66 4 86 /• BBr 
00481 FECI 
60482 I 
60481 
6648 c 
6648. 



•bis 
tEL 4 



80 

■1 ^T 



80 B8 



rt-i-8 D9 



ft 



".!'; 



66486 F 
U64 8 7 FBCC 

60488 FBCE 
60488 FBD6 
Q048Z 
08491 
Q6492 
80493 
' 68494 

wfc.' 7^- • w 
t"U r*t« -■* ;"*V"" 

■80496 
86499 FfiES 
68506 FEE? 1 ' 
06581 FBE9 
-88582 FBEB 



3D 
3C 
3F 

RE 

flB 
D6 3R 



80 



OP- 



FBDS F7 

f J~/ I.' C> O i' 

FBDE 70 

FBE1 27 

c. o ■ ■ ■ 



U:i 



8b 

E83E 

E83F 

06* 

CE 

34 
Cfi 



:HDk. 



':'HDF',Z 



BSR 
CMP R 

BNE 
BSR 

cmp r 

BNE 
~BSR 

TRB 

BSR 

ROD 

ROC 

STFi 
J>TR £ 

BSR 

PSH h 

pep 

I OR R 



PCvv 

SIR B 
SIR R 
TST 
BLQ 



BNE 
CMP 

J •- 
RTS 



n 



CRSIN 

#SYN 

RDHOR- 

CRSIN 

#ESC 

RDHOR) 

CRSIN 

CRSIN 
hrkr iR+1 

BFRPTR 

BFRSZE-f-1 

CRSIN 

CRSIN . 
NOPRNT 

RHl-'RI - 



BLKNRN 
RH0R2 ' 
BLKNRTT' 
ROHDR ' 
BLKNRN+1 
RDHOR : 



FOLLOWING FINOS THE 
START 6F THE HERDER. 

TESTS FOR HERDR CHRP 
STRRT-OF-HERDER. 

GOES BRCK IF NOT GOOD HDR 
RERDS IN HI BVTE OF LEN. 
SRVES HI LENGTH BYTE. 
INPUTS LO SIZE (LEN) BVTE 
FORMS POINTER TO THE ' 
TOP BVTE OF THE BUFFER. 

SRVES THE HI BUFF. PTR. 

jn Tup paqercTfr- pticcco 
iv inc. in^.'C i i c our reft. ■■ , 

ktzHDj IN BLULh NRHE. 

SRVES FIRST CHRP OF NRME. 
RE ftp JN SECOND CHRP INTO R. 
TESTS IF PRINT IS OFF. 
RESTORES FIRST NRME CHRP 
SKIPS IF PRINT FLRG IS 8. 
OlbPLRYS BLOCK NRNE ON 
THE CRT SCREEN. 
TESTS IF NRNE IS CHECKED. 
SKIPS IF NO NRNE CHECK. 
TESTS FIRST CHRP OF NRME. 
SKIPS BRCK IF 3RD' NRNE 

TL7 C- T C* ■*""£* f** i~i h t f% kt **>' * -? r~~ »**w * **•*. rv 

/ 1. „« / ™» ^c c- UNu Nnrtb. LHnR. 
xhlhx onCk If ohU ■ Nfttlt. 



08584 
88585 
00586 
00587 



* 



RDBFR RERDS I 
THE CASSETTE. 



INTO THE MEMORY BUFFER FROM 



U8\.'6c> 



:c 



9 F: 



W516 I 



: h C'F 06 



■ r, 1 
ftp 



rot:j Hi 86 



085j 
865'} 
06514 FBF7 IB 
80515 FBFS 16 
86516 FBF9 98 
88517 FBFB 27 
60518 FBFO 68 
06519 F8FE 26 



tc 



Drf%r I P. 



RDBFR CLR B 

LDN 
RBFR1 /*STH TMP 

/MSP CASTA 



T3X TMP 

CTT0 *3 (T> V 

RBR 



\J3EQ RHDR2 

INK 

■BtmM R'BFRl 
END 



I NIT B FOR CHECKSUM. 
LORDS STRRT OF BUFFER. 

R GETS CHRP RERD IN. 
X GETS BUFFER PTR. 

STOPS CHRP INTO BUFFER. 

H GETS R+B. 

8 GETS R. 

TESTS IF BUFFER FULL. ' 

TO EXIT IF RLL IB 



SKIPS 

INC TO NEXT CHRP POSIT I N. 



t> -:iN. 



Jtx bnLK 



i'*r L.CS 



